home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / CloseS.ass < prev    next >
Encoding:
Text File  |  1980-04-24  |  705 b   |  42 lines
  1.     .text
  2.     .sdreg    r2
  3.     .align    2
  4. _CloseS:
  5. ###############################################################################
  6. # name           offset
  7. # args ###########################
  8. # screen         0+0(r13)
  9.     mflr    r0
  10.     stw    r0,8(r1)
  11.     stwu    r1,-32(r1)
  12.     stw    r13,24(r1)
  13.     mr    r13,r1
  14.     stw    r3,0+28(r13)
  15.     lwz    r3,0+28(r13)
  16.     bl    _CloseScreen    # CloseScreen
  17. CloseSend:
  18. CloseSfinish:
  19.     li    r3,0
  20.     lwz    r13,24(r1)
  21.     addi    r1,r1,32
  22.     lwz    r0,8(r1)
  23.     mtlr    r0
  24.     blr
  25.  
  26.     .global    _CloseS
  27.     .type    _CloseS,2
  28.     .size    _CloseS,$-_CloseS
  29. CloseS_local:
  30.     .global    @_CloseS_local
  31.     .extern    _CloseScreen
  32.     .tocd
  33.     .extern    _PowerPCBase
  34.     .extern    _stdin
  35.     .extern    _stdout
  36.     .extern    _arg
  37.     .extern    _GfxBase
  38.     .extern    _IntuitionBase
  39.     .extern    _DOSBase
  40.     .extern    _ExecBase
  41.     .data
  42.